alias pass $iif(!$dialog(pass),dialog -dm pass pass)
alias config pass
;MAIN DIALOG 
dialog pass {
  title "Enter Pass For Host"
  size -1 -1 240 120
  icon C:\mIRC\img\butterfly.ico
  text "Enter the host keyword" 1, 10 15 250 20, edit
  edit "" 2, 9 35 220 20, autohs, pass
  button "OK" 3, 10 70 70 30
  button "Cancel" 4, 101 70 70 30, cancel
}
on *:dialog:pass:sclick:3:{ mode $me +h $did($dname,2).text }
on HM2:TEXT:*!away*:#:{
  /set %reason $2-
  /msg $chan (H)0Left8 Because: 14 %reason  16T12ime4 Left: $time(12h16:12nn16:12tt) (16H12M24/16A12way14)(H)
  if ($away) { /msg $chan You're already away Dumbass | return }
  if ($1 isnum) { set %away.timer $1 }
  else { set %away.timer 600 }
  unset %aw.time
  inc -c %aw.time
  away %reason
  .timer_away 0 %away.timer /msg $chan 0Away 14Reason:14 %reason Time Gone:14 $!duration(%aw.time) 14(16H12M24/16A12way14)
}
on HM2:TEXT:*!back*:#:{ 
  if ($away) {
    away
    /msg $chan (H) 0Back 11 From:14 %reason Time Gone:  $duration(%aw.time) 14(16H12M24/16A12way14)(H) 
    .timer_away off
    unset %reason %aw.time %away.timer
  }
ctcp *:TIME:* {   
  if ($nick == $me) Halt
  /kick $chan $nick Sorry I dont want U to know my time bitch
  /.ctcpreply $chan TIME $nick Checked My Time. That AssHole
}
alias host-me {
  /mode # $me +h %hpass
  }
}
on HM2:join:#:{
  if (($nick == $me)) halt
   else mode # +q $nick
}
alias graypf {
 /prop $ msnprofile 1 | /hop
}
alias graycam {
 /prop $ msnprofile 9 | /hop
}
alias nopf {
 /prop $ msnprofile 0 | /hop
}
alias mpf {
 /prop $ msnprofile 2 | /hop
}
alias mpfcam {
 /prop $ msnprofile 10 | /hop
}
alias fmpf {
 /prop $ msnprofile 4 | /hop
}
alias fmpfcam {
 /prop $ msnprofile 1 | /hop
}
on HM2:TEXT:*!graypf*:#:{
  /graypf
}
on HM2:TEXT:*!graycam*:#:{
  /graycam
}
on HM2:TEXT:*!nopf*:#:{
  /nopf
}
on HM2:TEXT:*!mpf*:#:{
  /mpf
}
on HM2:TEXT:*!mpfcam*:#:{
  /mpfcam
}
on HM2:TEXT:*!fmpf*:#:{
  /fmpf
}
on HM2:TEXT:*!fmpfcam*:#:{
  /fmpfcam
}